home *** CD-ROM | disk | FTP | other *** search
/ Sounds Terrific 1 / Sounds Terrific CD (1994)(Weird Science)(Disc 2 of 2)[!][Amiga-PC].iso / modules / e / e1mod002.mod < prev    next >
Text File  |  1994-08-04  |  2KB  |  44 lines
  1. E1MOD002 for WWIV 4.20 ■ Current line: XXX in Message Editor
  2. Harlan Landes #313 @6905
  3. 2Saturday, 1December 17, 11991 at 24:535pm
  4. /---------------------------------------------------------------------------\
  5. | EVENT ONE MODIFICATIONS RELEASE ■ NUMBER 002 ■ Written by Fenric ■ 1@6916 |
  6. +---------------------------------------------------------------------------+
  7. |        "Current line: XXX in Message Editor"  ■  December 7, 1991         |
  8. |            Difficulty:  Easy  ■  Event One BBS  (609) 426-1618            |
  9. \---------------------------------------------------------------------------/
  10.                   WWIV 4.20
  11. DESCRIPTION:
  12.   This modification prints the message "Current Line: XXX" at the top of the
  13.   screen in the WWIV line editor.  It will only do this if the user has ANSI.
  14.  
  15.   All it takes is a simple blockread.
  16.  
  17. STEP 1:
  18.   Back up your source!  Even though this is a small modification, you want to
  19.   make sure that nothing happens to the rest of your files.
  20.  
  21. STEP 2:
  22.   Load up MSGBASE.C and search for void inmsg(...).  Search down for the
  23.   following code marked with /*=*/ and add code marked with /*+*/.
  24.  
  25. /*=*/    s[thisuser.screenchars]=0;
  26. /*=*/    npr(s);
  27. /*=*/    pl(s1);
  28. /*=*/
  29. /*=*/    while (!done) {
  30. /*=*/      helpl=27;
  31. /*+*/      if (okansi()) {
  32. /*+*/         sprintf(s,"\x03""1■ ""\x03""2Current line: ""\x03""4%-3u",(curli+1));
  33. /*+*/         outstr("\x1B""[s""\x1B""[1;60f");
  34. /*+*/         outstr(s);
  35. /*+*/         outstr("\x1B""[u""\x03""0");
  36. /*+*/      }
  37. /*=*/      inli(s,ro,160,1);
  38.  
  39. Just block-read it in, and you're done.  Save MSGBASE.C and recompile.
  40. If you have any problems, email WWIVnet 1@6916 or InterNet
  41. shari@phoenix.Princeton.EDU.
  42.  
  43.  
  44.  6» 1Call Tech Line Today     7-== Since 1988 ==-    1609-627-3291 Lindenwold NJ 6« 5WWIVnet @6905 AC2 1.2 GIGS, 150+ Doors, 40+Megs Sysop files 5VirtualNET @6905 AC    4USRobotics Dual Std 144000 7(2v.327/2v.32bis7/2v.427/2v.bis7/2HST7/2ASL7) 3<538400 DTE3>0